Public Class ICTPFactory
	Inherits TcKs.MSOffice.Common.ChildObjectWrapperBase
	
	Public Sub New ( ByVal nativeObject As System.Object,  ByVal rootObject As TcKs.MSOffice.Common.RootObjectWrapperBase )
		MyBase.New ( nativeObject, rootObject )
	End Sub 
	
	Public Function CreateCTP( aCTPAxID As System.String, aCTPTitle As System.String, aCTPParentWindow As System.Object ) As TcKs.MSOffice.Common.CustomTaskPane
		Dim tmp_CTPParentWindow As System.Object = TcKs.MSOffice.Common.WrapperHelper.GetWrappedObjectIfCan( aCTPParentWindow )
		Dim result As System.Object = MyBase.WrappedObject.CreateCTP( aCTPAxID, aCTPTitle, tmp_CTPParentWindow )
		Dim ret As New TcKs.MSOffice.Common.CustomTaskPane( result, Me.RootObject )
		Return ret
	End Function 
	
End Class 
